#include <sys/types.h> /* See NOTES */
#include <sys/socket.h>
#include <arpa/inet.h> //包含sockaddr_in结构
#include <unistd.h>
#include "sock.hpp"
#include<functional>

// 这个数字作为我们初始化得大小，为什么这么设置。首先我们要知道这个结构体是位图，本质就是结构体里面套了一个数组。
// struct selectServer
// {
//    int *arr[10]
// };

// 一个int就占用4个字节 ，就可以表示32位数，当我们求得这个结构体得大小得时候，其实就是求了这个结构体得大小，这个结构体里面只有数组
namespace select_ns
{
    using func_t = std::function<std::string (const std::string&)>;
    static const uint16_t gport = 8080;
    static const int fdnum = sizeof(fd_set) * 8;
    static const int defaultfd = -1;
    class SelectServer
    {
    public:
        SelectServer(func_t func,uint16_t port = gport)
            : _port(port), _listenSock(-1),_func(func)
        {
        }

        void Print()
        {
            std::cout << "fd list: ";
            for (int i = 0; i < fdnum; i++)
            {
                if (fdarray[i] != defaultfd)
                    std::cout << fdarray[i] << " ";
            }
            std::cout << std::endl;
        }
        void Accepter(int listensock)
        {
            std::string clientip;
            uint16_t clientport=0;
            int sock = Sock::Accept(listensock, &clientip, &clientport);
            if(sock<0)
            {
                logMessage(NORMAL,"accept error");
                exit(ACCEPT_ERR);
            }
            logMessage(NORMAL, "accept success [%s:%d]", clientip.c_str(), clientport);
            // 将这个sock 和 listen sock分离
            // 找到sock的插入位置
            int i= 0;
            for(;i<fdnum;i++)
            {
                // 说明位置不是插入的位置
                if(fdarray[i]!=defaultfd)
                {
                    continue;
                }
                break;
            }
            if(i==(fdnum-1))
            {
                logMessage(NORMAL,"位置满了，请稍后再试");
            }else{
                fdarray[i]=sock;
            }
            Print();

        }

        void Recver(int sock, int pos)
        {
            char buffer[1024];
            ssize_t s = recv(sock, buffer, sizeof(buffer) - 1, 0); // 这里在进行读取的时候，会不会被阻塞？1， 0
            if (s > 0)
            {
                buffer[s] = 0;
                logMessage(NORMAL, "client# %s", buffer);
            }
            else if (s == 0)
            {

                close(sock);
                fdarray[pos] = defaultfd;
                logMessage(NORMAL, "client quit");
                return;
            }
            else
            {
                close(sock);
                fdarray[pos] = defaultfd;
                logMessage(ERROR, "client quit: %s", strerror(errno));
                return;
            }
            // 2. 处理request
            std::string response = _func(buffer);
            std::cout<<response<<std::endl;

            // 3. 返回response
            // write bug
            write(sock, response.c_str(), response.size());

            logMessage(DEBUG, "out Recver");
        }
        void HandlerEvent(fd_set &rfds)
        {
            for (int i = 0; i < fdnum; i++)
            {
                // 过滤掉非法的fd
                if (fdarray[i] == defaultfd)
                    continue;

                // 正常的fd
                // 正常的fd不一定就绪了
                // 目前一定是listensock，只有这一个
                if (FD_ISSET(fdarray[i], &rfds) && fdarray[i] == _listenSock)
                    Accepter(_listenSock);
                else if (FD_ISSET(fdarray[i], &rfds))
                    Recver(fdarray[i], i);
                else
                {
                }
            }
        }
        void initServer()
        {
            _listenSock = Sock::getSocket();
            Sock::Bind(_listenSock, _port);
            Sock::Listen(_listenSock);
            // 考虑初始化为多大
            fdarray = new int[fdnum];
            for (int i = 0; i < fdnum; i++)
            {
                fdarray[i] = defaultfd;
            }
            fdarray[0] = _listenSock;
        }

        void start()
        {
            for (;;)
            {
                fd_set rfds;
                FD_ZERO(&rfds);
                int maxfd = fdarray[0];

                for (int i = 0; i < fdnum; i++)
                {
                    if (fdarray[i] == defaultfd)
                    {
                        continue;
                    }
                    FD_SET(fdarray[i], &rfds); // 合法 fd 全部添加到读文件描述符集中

                    if (maxfd < fdarray[i])
                    {
                        maxfd = fdarray[i]; // 更新所有fd中最大的fd
                    }
                }

                struct timeval timeout = {1, 0};
                int n = select(maxfd + 1, &rfds, nullptr, nullptr, nullptr);
                switch (n)
                {
                case 0:
                    logMessage(NORMAL, "time out...");
                    break;
                case -1:
                    logMessage(WARNING, "select error, code: %d, err string: %s", errno, strerror(errno));
                    break;
                default:
                    logMessage(NORMAL, "get a new link...");
                    HandlerEvent(rfds);
                    break;
                }
            }
        }
        ~SelectServer()
        {
            if (_listenSock < 0)
                close(_listenSock);
            if (fdarray)
                delete[] fdarray;
        }

    private:
        int _listenSock;
        uint16_t _port;
        int *fdarray;
        func_t _func;
    };

}
